home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 22 / Cream of the Crop 22.iso / bbs / pad321.zip / UPCHAR.MH < prev    next >
Text File  |  1996-08-21  |  319b  |  18 lines
  1. #ifndef __UPCHAR_MH
  2. #define __UPCHAR_MH
  3.  
  4. char dummyFunction (Ref string: someparameter) {
  5.   someparameter := "";
  6.   }
  7.  
  8. // upChar converts a character to its upper-case equivilant.
  9.  
  10. char upChar (char: ch) {
  11.   if ((ch >= 'a') and (ch <= 'z')) {
  12.     return ch - 'a' + 'A';
  13.     };
  14.   return ch;
  15.   }
  16.  
  17. #endif
  18.